home *** CD-ROM | disk | FTP | other *** search
/ The PC-SIG Library 10 / The PC-Sig Library - Shareware for the IBM PC and Compatibles (PC-SIG)(Tenth Edition Disks 1-2804)(1991).iso / PC_SIGCD / 05 / 6 / DISK0564.ZIP / SOURCE.ARC / ASM.ARC / MACROS.DEF < prev    next >
Text File  |  1989-01-19  |  1KB  |  46 lines
  1. ;       MACRO - TESTS FOR DOS 2.0, EXITS IF DOS 1.
  2.  
  3. TEST_DOS2       MACRO
  4.         LOCAL   VERSOK
  5.         MOV     AH,GET_VERSION
  6.         INT     DOS
  7.         CMP     AL,2
  8.         JGE     VERSOK
  9.         CALL    TYPTX
  10.         DB      "MS/PCDOS 2 Required.",0DH,8DH
  11.         MOV     AH,ABORT
  12.         INT     DOS
  13. VERSOK:
  14.         ENDM
  15.  
  16. DOSCALL    MACRO    FUNCT            ;ISSUE A DOS FUNCTION CALL
  17.     MOV    AH, FUNCT
  18.     INT    DOS
  19.     ENDM
  20.  
  21. COMPLIST MACRO  LIST,BRANCH             ;COMPARE AL WITH A SERIES OF VALUES
  22.         IRP     XX,<LIST>
  23.         CMP     AL,XX
  24.         JE      BRANCH
  25.         ENDM
  26.         ENDM
  27.  
  28. ;       COMPARE TWO CHARACTER STRINGS (POINTED AT BY SI AND DI) UNTIL NO MATCH
  29. ;       OR ZERO BYTE:
  30.  
  31. COMP_STRINGS    MACRO
  32.         LOCAL   ENDSRC,NOTEQU,COMPNAM
  33. COMPNAM:
  34.         MOV     AL,DS:[SI]
  35.         CMP     AL,0
  36.         JE      ENDSRC                  ;IF END OF SOURCE
  37.         CMP     AL,BYTE PTR DS:[DI]
  38.         JNE     NOTEQU                  ;IF FAILURE TO MATCH
  39.         INC     DI
  40.         INC     SI
  41.         JMP     COMPNAM
  42. ENDSRC: CMP     AL,BYTE PTR DS:[DI]
  43. NOTEQU:
  44.         ENDM
  45.  
  46.